home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 65.zip / BS1 part 65 / High Speed Pascal v1.0 d1.adf / s / Startup-Sequence < prev    next >
Text File  |  1992-01-14  |  859b  |  23 lines
  1. c:SetPatch >NIL: ;patch system functions
  2. Addbuffers df0: 10
  3. cd c:
  4. echo "Amiga Workbench Disk (UK). Release 1.3.3 version 34.34"
  5. echo "Welcome to HighSpeed Pascal 1.00"
  6. Sys:System/FastMemFirst ; move C00000 memory to last in list
  7. BindDrivers
  8. SetClock load ;load system time from real time clock (A1000 owners should
  9.               ;replace the SetClock load with Date
  10. FF >NIL: -0 ;speed up Text
  11. resident CLI L:Shell-Seg SYSTEM pure add; activate Shell
  12. resident c:Execute pure
  13. mount newcon:
  14. ;
  15. failat 11
  16. run execute s:StartupII ;This lets resident be used for rest of script
  17. wait >NIL: 5 mins ;wait for StartupII to complete (will signal when done)
  18. ;
  19. SYS:System/SetMap gb ;Activate the ()/* on keypad
  20. path ram: c: sys:hspascal sys:utilities sys:system s: sys:prefs add ;set path for Workbench
  21. LoadWB delay  ;wait for inhibit to end before continuing
  22. endcli >NIL:
  23.